home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / filhos.dxr / 00030.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  817 b   |  43 lines
  1. on enterFrame
  2.   global Gflag
  3.   set Gflag to 0
  4. end
  5.  
  6. on mouseUp
  7.   if rollOver(1) then
  8.     go(1)
  9.   end if
  10. end
  11.  
  12. on exitFrame
  13.   if rollOver(15) then
  14.     if the visible of sprite 15 = 0 then
  15.       set the visible of sprite 15 to 1
  16.     end if
  17.   else
  18.     set the visible of sprite 15 to 0
  19.   end if
  20.   if rollOver(16) then
  21.     if the visible of sprite 16 = 0 then
  22.       set the visible of sprite 16 to 1
  23.     end if
  24.   else
  25.     set the visible of sprite 16 to 0
  26.   end if
  27.   if rollOver(14) then
  28.     if the visible of sprite 17 = 0 then
  29.       set the visible of sprite 17 to 1
  30.     end if
  31.   else
  32.     set the visible of sprite 17 to 0
  33.   end if
  34.   if rollOver(18) then
  35.     if the visible of sprite 18 = 0 then
  36.       set the visible of sprite 18 to 1
  37.     end if
  38.   else
  39.     set the visible of sprite 18 to 0
  40.   end if
  41.   go(the frame)
  42. end
  43.